home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 06 - 1990 / 06.07 Jul 90 / Commando Programming ƒ / Rezscripts / RezC.DLOG.Cmdo.R < prev    next >
Encoding:
Text File  |  1988-07-09  |  6.9 KB  |  261 lines  |  [TEXT/MPS ]
  1. /* File RezC.DLOG.Cmdo.R */ 
  2. /* Commando interface to build DLOG Rez input */
  3. /* W. Powell 1988 */
  4.  
  5. /* Rez definitions for Rez-building Commando interfaces */
  6. #include "Types.R"
  7. #include "Cmdo.R"
  8.  
  9. Resource 'cmdo' (200) {
  10.     { 295,
  11.     "Rezc.DLOG produces Rez input for a Dialog resource",
  12.     {
  13. /* This include file has a standard arrangement of items
  14.  *   common to all resources: ID#, attributes, name, 
  15.  *      and redirection of output from the Rezc.≈ script        */
  16. #include "CmdoReztStart.R"
  17.  
  18. /* Set up parameters for a Rectangle entry area                */    
  19.     #define RTop 85
  20.     #define RLeft 30
  21.     #define RTit "Window Rectangle"
  22.     #define RDep {1}
  23. /* This include file has a standard arrangement of edit boxes
  24.  *   for input of rectangles                                */
  25. #include "CmdoRect.R"
  26.  
  27. /* other items particular to this case */    
  28.     /* Item 11 */
  29.     OR {{1}}, NestedDialog {
  30.         4, /* Dialog number */
  31.         {85,250,106,370},
  32.         "Window Type",
  33.         "Select style of window for dialog." },
  34.     /* Item 12 */
  35.     OR {{1}}, RadioButtons {{
  36.         {80,380,96,460},
  37.             "Visible","-V",NotSet,"Make dialog visible.",
  38.         {97,380,113,460},
  39.             "Invisible","-I",NotSet,"Make dialog invisible."
  40.         }},
  41.     /* Item 13 */
  42.     OR {{1}}, RegularEntry {
  43.         "DITL ID#:",
  44.         {114,250,130,310},
  45.         {114,315,130,370},
  46.         "",keepCase,"",
  47.         "Resource ID # of this dialog’s item list." },
  48.     /* Item 14 */
  49.     OR {{1}}, RegularEntry {
  50.         "RefCon:",
  51.         {138,250,154,310},
  52.         {138,315,154,430},
  53.         "",keepCase,"-const",
  54.         "User-defined constant.\nHEX long word." },
  55.     /* Item 15 */
  56.     OR {{1}}, RegularEntry {
  57.         "Title:",
  58.         {162,30,178,90},
  59.         {162,100,178,440},
  60.         "",keepCase,"-title",
  61.         "Title for window." },
  62.     /* Item 16 */
  63.     AND {{6,7,8,9,13}}, DoItButton {},
  64.     }, 
  65. /* Dialog 2 */
  66. /* Include the standard resource attributes dialog */
  67. #include "CmdoReztAttr.R"
  68.  
  69. /* Dialog 3 */
  70. /* Include a redirection dialog */
  71. #include "CmdoReztRdir.R"
  72.  
  73. /* Dialog 4 */
  74.     270,
  75.     "Select style of window.",
  76.     {
  77.     /* Item 1 */
  78.     NotDependent {}, RadioButtons {{
  79.         {55,54,71,70},
  80.             "","documentProc",NotSet,"",
  81.         {55,156,71,172},
  82.             "","dBoxProc",NotSet,
  83.             "NOTE: This window type inhibits"
  84.             " MultiFinder context switching.",
  85.         {55,258,71,274},
  86.             "","plainDBox",NotSet,"",
  87.         {55,360,71,376},
  88.             "","altDBoxProc",NotSet,"",
  89.         {115,54,131,70},
  90.             "","noGrowDocProc",NotSet,"",
  91.         {115,156,131,172},
  92.             "","zoomDocProc",NotSet,"",
  93.         {115,258,131,274},
  94.             "","zoomNoGrow",NotSet,"",
  95.         {115,360,131,376},
  96.             "","rDocProc",NotSet,""
  97.         }},
  98.     /* Item 2 */
  99.     NotDependent{}, RadioButtons {{
  100.         {140,100,156,210},
  101.             "Has Close Box","-goAway",NotSet,
  102.             "Window has a close box.",
  103.         {140,280,156,390},
  104.             "No Close Box","-NoGoAway",NotSet,
  105.             "Window does not have a close box."
  106.         }},
  107.     /* Item 3 */
  108.     NotDependent {}, Box {
  109.         gray, 
  110.         {135,80,160,400} },
  111.     /* Item 4 */
  112.     NotDependent {}, TextTitle {
  113.         plain,
  114.         {56,71,70,137},
  115.         3,9,
  116.         "documentProc" },
  117.     NotDependent {}, TextTitle {
  118.         plain,
  119.         {56,173,70,234},
  120.         3,9,
  121.         "dBoxProc" },
  122.     NotDependent {}, TextTitle {
  123.         plain,
  124.         {56,275,70,336},
  125.         3,9,
  126.         "plainDBox" },
  127.     NotDependent {}, TextTitle {
  128.         plain,
  129.         {56,377,70,438},
  130.         3,9,
  131.         "altDBoxProc" },
  132.     NotDependent {}, TextTitle {
  133.         plain,
  134.         {116,71,130,150},
  135.         3,9,
  136.         "noGrowDocProc" },
  137.     NotDependent {}, TextTitle {
  138.         plain,
  139.         {116,173,130,234},
  140.         3,9,
  141.         "zoomDocProc" },
  142.     NotDependent {}, TextTitle {
  143.         plain,
  144.         {116,275,130,336},
  145.         3,9,
  146.         "zoomNoGrow" },
  147.     NotDependent {}, TextTitle {
  148.         plain,
  149.         {116,377,130,438},
  150.         3,9,
  151.         "rDocProc" },
  152.     NotDependent {}, PictOrIcon {
  153.         Icon, 200, {20,70,52,102} },
  154.     NotDependent {}, PictOrIcon {
  155.         Icon, 201, {20,172,52,204} },
  156.     NotDependent {}, PictOrIcon {
  157.         Icon, 202, {20,274,52,306} },
  158.     NotDependent {}, PictOrIcon {
  159.         Icon, 203, {20,376,52,408} },
  160.     
  161.     NotDependent {}, PictOrIcon {
  162.         Icon, 204, {80,70,112,102} },
  163.     NotDependent {}, PictOrIcon {
  164.         Icon, 205, {80,172,112,204} },
  165.     NotDependent {}, PictOrIcon {
  166.         Icon, 206, {80,274,112,306} },
  167.     NotDependent {}, PictOrIcon {
  168.         Icon, 207, {80,376,112,408} },
  169.     },
  170. }
  171. }; 
  172.  
  173.  
  174. resource 'ICON' (200, "documentProc") {
  175.     $"FFFF FFFF 8000 0001 BEFF FFF1 A200 0001"
  176.     $"A2FF FFF1 A200 0001 BEFF FFF1 8000 0001"
  177.     $"FFFF FFFF 8000 0041 8000 0001 8000 0041"
  178.     $"8000 0001 8000 0041 8000 0001 8000 0041"
  179.     $"8000 0001 8000 0041 8000 0001 8000 0041"
  180.     $"8000 0001 8000 0041 8000 0001 8000 0041"
  181.     $"8000 0001 D555 5555 8000 0001 8000 0041"
  182.     $"8000 0001 8000 0041 8000 0001 FFFF FFFF"
  183. };
  184.  
  185. resource 'ICON' (201, "dBoxProc") {
  186.     $"FFFF FFFF 8000 0001 8000 0001 9FFF FFF9"
  187.     $"9FFF FFF9 9800 0019 9800 0019 9800 0019"
  188.     $"9800 0019 9800 0019 9800 0019 9800 0019"
  189.     $"9800 0019 9800 0019 9800 0019 9800 0019"
  190.     $"9800 0019 9800 0019 9800 0019 9800 0019"
  191.     $"9800 0019 9800 0019 9800 0019 9800 0019"
  192.     $"9800 0019 9800 0019 9800 0019 9FFF FFF9"
  193.     $"9FFF FFF9 8000 0001 8000 0001 FFFF FFFF"
  194. };
  195.  
  196. resource 'ICON' (202, "PlainDBox") {
  197.     $"FFFF FFFF 8000 0001 8000 0001 8000 0001"
  198.     $"8000 0001 8000 0001 8000 0001 8000 0001"
  199.     $"8000 0001 8000 0001 8000 0001 8000 0001"
  200.     $"8000 0001 8000 0001 8000 0001 8000 0001"
  201.     $"8000 0001 8000 0001 8000 0001 8000 0001"
  202.     $"8000 0001 8000 0001 8000 0001 8000 0001"
  203.     $"8000 0001 8000 0001 8000 0001 8000 0001"
  204.     $"8000 0001 8000 0001 8000 0001 FFFF FFFF"
  205. };
  206.  
  207. resource 'ICON' (203, "AltDBoxProc") {
  208.     $"FFFF FFFE 8000 0003 8000 0003 8000 0003"
  209.     $"8000 0003 8000 0003 8000 0003 8000 0003"
  210.     $"8000 0003 8000 0003 8000 0003 8000 0003"
  211.     $"8000 0003 8000 0003 8000 0003 8000 0003"
  212.     $"8000 0003 8000 0003 8000 0003 8000 0003"
  213.     $"8000 0003 8000 0003 8000 0003 8000 0003"
  214.     $"8000 0003 8000 0003 8000 0003 8000 0003"
  215.     $"8000 0003 8000 0003 FFFF FFFF 3FFF FFFF"
  216. };
  217.  
  218. resource 'ICON' (204, "noGrowDocProc") {
  219.     $"FFFF FFFF 8000 0001 BEFF FFF1 A200 0001"
  220.     $"A2FF FFF1 A200 0001 BEFF FFF1 8000 0001"
  221.     $"FFFF FFFF 8000 0001 8000 0001 8000 0001"
  222.     $"8000 0001 8000 0001 8000 0001 8000 0001"
  223.     $"8000 0001 8000 0001 8000 0001 8000 0001"
  224.     $"8000 0001 8000 0001 8000 0001 8000 0001"
  225.     $"8000 0001 8000 0001 8000 0001 8000 0001"
  226.     $"8000 0001 8000 0001 8000 0001 FFFF FFFF"
  227. };
  228.  
  229. resource 'ICON' (205, "zoomDocProc") {
  230.     $"FFFF FFFF 8000 0001 BEFF FEF9 A200 0089"
  231.     $"A2FF FE89 A200 0089 BEFF FEF9 8000 0001"
  232.     $"FFFF FFFF 8000 0041 8000 0001 81FF 0041"
  233.     $"8002 0001 8004 0041 8008 0001 8010 0041"
  234.     $"8020 0001 8040 0041 8080 0001 81FF 0041"
  235.     $"8000 0001 8000 0041 8000 0001 8000 0041"
  236.     $"8000 0001 D555 5555 8000 0001 8000 0041"
  237.     $"8000 0001 8000 0041 8000 0001 FFFF FFFF"
  238. };
  239.  
  240. resource 'ICON' (206, "zoomNoGrow") {
  241.     $"FFFF FFFF 8000 0001 BEFF FEF9 A200 0089"
  242.     $"A2FF FE89 A200 0089 BEFF FEF9 8000 0001"
  243.     $"FFFF FFFF 8000 0001 8000 0001 8000 0001"
  244.     $"8000 0001 803F F001 8000 2001 8000 4001"
  245.     $"8000 8001 8001 0001 8002 0001 8004 0001"
  246.     $"8008 0001 8010 0001 803F F001 8000 0001"
  247.     $"8000 0001 8000 0001 8000 0001 8000 0001"
  248.     $"8000 0001 8000 0001 8000 0001 FFFF FFFF"
  249. };
  250.  
  251. resource 'ICON' (207, "rDocProc") {
  252.     $"0FFF FFF0 3FFF FFFC 707F FFFE 777F FFFE"
  253.     $"F77F FFFF F77F FFFF F07F FFFF FFFF FFFF"
  254.     $"8000 0001 8000 0001 8000 0001 8000 0001"
  255.     $"8000 0001 8000 0001 8000 0001 8000 0001"
  256.     $"8000 0001 8000 0001 8000 0001 8000 0001"
  257.     $"8000 0001 8000 0001 8000 0001 8000 0001"
  258.     $"8000 0001 8000 0001 8000 0001 8000 0001"
  259.     $"4000 0002 4000 0002 3000 000C 0FFF FFF0"
  260. };
  261.